﻿Imports DAO
Imports DTO
Public Class ThamSoBUS
    Public Function THAYDOITIENKHAM(ByVal TS As ThamSoDTO) As Integer
        Dim TSDAO As New ThamSoDAO()
        Dim a As Integer

        a = TSDAO.UPDATE_TIENKHAM(TS)



    End Function
    Public Function THAYDOIKHAMTOIDA(ByVal TS As ThamSoDTO) As Integer
        Dim TSDAO As New ThamSoDAO()
        Dim b As Integer
        b = TSDAO.UPDATE_KHAMTOIDA(TS)




    End Function
End Class
